home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
3D GFX
/
3D GFX.iso
/
amiutils
/
e_h
/
fractualuniverse
/
formulas
/
newton1.form
< prev
next >
Wrap
Text File
|
1995-12-30
|
266b
|
32 lines
Newton1
{
{
x1=-2.0
x2= 2.0
y1=-1.6
y2= 1.6
par1.r=4.0
par1.i=0.0
bailout=0.000001
}
{
t=par1-[1.0,0.0]
z=pixel
}
{
zu=z^t
zo=zu*z
zo=zo-[1.0,0.0]
zu=zu*par1
x=zo/zu
z=z-x
w=abs(zo)
}
{
w<bailout
}
{
par1 : exponent
}
}